﻿Imports DBGlue

Class MainWindow

    Private _DB As DBContext
    Private _WatchList As WatchList
    Public Sub New()

        ' Cet appel est requis par le concepteur.
        InitializeComponent()

        ' Ajoutez une initialisation quelconque après l'appel InitializeComponent().
        Init()
    End Sub

    Private Sub Init()

        _DB = New DBContext("c:\temp\watchdb.db3")
        _WatchList = New WatchList(_DB)
        DataContext = _WatchList

    End Sub

End Class
